home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Cl…Business) - New Member 21 / Software of the Month Club XXI - New Member Business.ISO / mac / Business / Financial Portfolio v4.1 ƒ / Financial Portfolio v4.1 / Financial Portfolio v4.1.rsrc / LENS_182_Graph Fonts.bin < prev    next >
Text File  |  1995-11-23  |  3KB  |  106 lines
  1. ItemType: WIND
  2. Rect: 120,287,575,391
  3. AutoSize: FALSE
  4. Style: Dialog
  5. HasTitleBar: TRUE
  6. HasZoomBox: FALSE
  7. Name: Graph Fonts
  8. Script: --on windowEvent  wdID,wdName,objNo,objName,objValue┬┬if objValue="Open" then ┬  ┬else if objValue="Close" then ┬  ┬else if objValue="Suspend" then ┬  ┬else if objValue="Resume" then ┬  ┬else if objValue="CloseBox" then ┬  ┬else if objValue="ZoomBox" then ┬  ┬else if objValue="GrowBox" then ┬  ┬else if objValue="TitleBar" then ┬  ┬end if┬┬--end windowEvent
  9. Params: i9_Text┬i9_SelectionText┬i13_Text┬i13_SelectionText┬i10_SelectionText┬i11_SelectionText┬i0_TopLeft
  10.  
  11. ItemType: PUSH
  12. Rect: 373,62,445,82
  13. Name: OK
  14. DefaultItem: TRUE
  15. AutoClose: TRUE
  16.  
  17. ItemType: PUSH
  18. Rect: 369,21,449,41
  19. Name: cancel
  20. CancelItem: TRUE
  21. AutoClose: TRUE
  22. Script: restoreFonts
  23.  
  24. ItemType: LINE
  25. Rect: 44,59,361,61
  26. Pen: Gray
  27. PenSize: 1,2
  28.  
  29. ItemType: LBL
  30. Rect: 5,32,59,48
  31. Text: Header:
  32.  
  33. ItemType: LBL
  34. Rect: 4,72,59,88
  35. Text: Legend:
  36.  
  37. ItemType: LBL
  38. Rect: 84,7,117,23
  39. TextStyle: Underline
  40. Text: Font
  41.  
  42. ItemType: LBL
  43. Rect: 207,7,238,23
  44. TextStyle: Underline
  45. Text: Size
  46.  
  47. ItemType: LBL
  48. Rect: 283,7,320,23
  49. TextStyle: Underline
  50. Text: Style
  51.  
  52. ItemType: POP
  53. Rect: 58,34,186,51
  54. TextFont: Geneva
  55. TextSize: 10
  56. AutoSize: FALSE
  57. Name: FontH
  58. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬get wsGet(wdID,"FontH","Value")┬set the textFont of fld "title" to it┬--end mouseUp
  59.  
  60. ItemType: POP
  61. Rect: 195,34,249,51
  62. TextFont: Geneva
  63. TextSize: 10
  64. AutoSize: FALSE
  65. Name: sizeH
  66. Text: 9┬10┬12┬14┬18┬20┬24
  67. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬get wsGet(wdID,"SizeH","Value")┬set the textSize of fld "title" to it┬--end mouseUp
  68.  
  69. ItemType: POP
  70. Rect: 260,34,351,51
  71. TextFont: Geneva
  72. TextSize: 10
  73. AutoSize: FALSE
  74. Name: styleH
  75. Text: plain┬bold┬italic┬bold,italic
  76. Script: get wsGet(wdID,"styleH","Value")┬set the textstyle of fld "title" to it
  77.  
  78. ItemType: LINE
  79. Rect: 359,0,362,105
  80. PenSize: 3,1
  81.  
  82. ItemType: POP
  83. Rect: 58,73,186,90
  84. TextFont: Geneva
  85. TextSize: 10
  86. AutoSize: FALSE
  87. Name: FontB
  88. Script: get wsGet(wdID,"FontB","Value")┬put it into ff┬if there is a cd fld "legendName" then┬  set the textFont of cd fld "legendName" to ff┬  set the textFont of cd fld "legendPerc" to ff┬else┬  set the textFont of fld "legendName" to ff┬  set the textFont of fld "legendPerc" to ff┬end if┬set the textFont of fld "date" to ff┬set the textFont of fld "theTotal" to ff
  89.  
  90. ItemType: TEXT
  91. Rect: 10,107,436,150
  92. TextFont: Geneva
  93. TextSize: 9
  94. AutoSize: FALSE
  95. Name: Instructions
  96. Text: Choose your selections for the header and legend sections of the graph from the above pop-up menus (initially, the previous settings are shown.) Click ╥OK╙ to retain those changes or ╥cancel╙ to revert to the previous settings.
  97.  
  98. ItemType: PUSH
  99. Rect: 7,4,23,20
  100. AutoSize: FALSE
  101. Name: ?
  102. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬get wsGet(wdID,"0","Height")┬if it<120 then┬  wsSet wdID,"0","Height", "150"┬else┬  wsSet wdID,"0","Height", "104"┬end if┬--end mouseUp
  103.  
  104. ItemType: LINE
  105. Rect: 1,104,442,106
  106. PenSize: 1,2